object modJudo: TmodJudo
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  OnDestroy = DataModuleDestroy
  Left = 215
  Top = 172
  Height = 445
  Width = 634
  object cdsTabellone32: TClientDataSet
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Atleta1'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta2'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta3'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta4'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta5'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta6'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta7'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta8'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta9'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta10'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta11'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta12'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta13'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta14'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta15'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta16'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta17'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta18'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta19'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta20'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta21'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta22'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta23'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta24'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta25'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta26'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta27'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta28'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta29'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta30'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta31'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Atleta32'
        DataType = ftString
        Size = 50
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 56
    Top = 16
    object cdsTabellone32Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabellone32Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabellone32Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabellone32Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
    object cdsTabellone32Atleta5: TStringField
      FieldName = 'Atleta5'
      Size = 50
    end
    object cdsTabellone32Atleta6: TStringField
      FieldName = 'Atleta6'
      Size = 50
    end
    object cdsTabellone32Atleta7: TStringField
      FieldName = 'Atleta7'
      Size = 50
    end
    object cdsTabellone32Atleta8: TStringField
      FieldName = 'Atleta8'
      Size = 50
    end
    object cdsTabellone32Atleta9: TStringField
      FieldName = 'Atleta9'
      Size = 50
    end
    object cdsTabellone32Atleta10: TStringField
      FieldName = 'Atleta10'
      Size = 50
    end
    object cdsTabellone32Atleta11: TStringField
      FieldName = 'Atleta11'
      Size = 50
    end
    object cdsTabellone32Atleta12: TStringField
      FieldName = 'Atleta12'
      Size = 50
    end
    object cdsTabellone32Atleta13: TStringField
      FieldName = 'Atleta13'
      Size = 50
    end
    object cdsTabellone32Atleta14: TStringField
      FieldName = 'Atleta14'
      Size = 50
    end
    object cdsTabellone32Atleta15: TStringField
      FieldName = 'Atleta15'
      Size = 50
    end
    object cdsTabellone32Atleta16: TStringField
      FieldName = 'Atleta16'
      Size = 50
    end
    object cdsTabellone32Atleta17: TStringField
      FieldName = 'Atleta17'
      Size = 50
    end
    object cdsTabellone32Atleta18: TStringField
      FieldName = 'Atleta18'
      Size = 50
    end
    object cdsTabellone32Atleta19: TStringField
      FieldName = 'Atleta19'
      Size = 50
    end
    object cdsTabellone32Atleta20: TStringField
      FieldName = 'Atleta20'
      Size = 50
    end
    object cdsTabellone32Atleta21: TStringField
      FieldName = 'Atleta21'
      Size = 50
    end
    object cdsTabellone32Atleta22: TStringField
      FieldName = 'Atleta22'
      Size = 50
    end
    object cdsTabellone32Atleta23: TStringField
      FieldName = 'Atleta23'
      Size = 50
    end
    object cdsTabellone32Atleta24: TStringField
      FieldName = 'Atleta24'
      Size = 50
    end
    object cdsTabellone32Atleta25: TStringField
      FieldName = 'Atleta25'
      Size = 50
    end
    object cdsTabellone32Atleta26: TStringField
      FieldName = 'Atleta26'
      Size = 50
    end
    object cdsTabellone32Atleta27: TStringField
      FieldName = 'Atleta27'
      Size = 50
    end
    object cdsTabellone32Atleta28: TStringField
      FieldName = 'Atleta28'
      Size = 50
    end
    object cdsTabellone32Atleta29: TStringField
      FieldName = 'Atleta29'
      Size = 50
    end
    object cdsTabellone32Atleta30: TStringField
      FieldName = 'Atleta30'
      Size = 50
    end
    object cdsTabellone32Atleta31: TStringField
      FieldName = 'Atleta31'
      Size = 50
    end
    object cdsTabellone32Atleta32: TStringField
      FieldName = 'Atleta32'
      Size = 50
    end
  end
  object cdsTabellone16: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 184
    object cdsTabellone16Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabellone16Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabellone16Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabellone16Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
    object cdsTabellone16Atleta5: TStringField
      FieldName = 'Atleta5'
      Size = 50
    end
    object cdsTabellone16Atleta6: TStringField
      FieldName = 'Atleta6'
      Size = 50
    end
    object cdsTabellone16Atleta7: TStringField
      FieldName = 'Atleta7'
      Size = 50
    end
    object cdsTabellone16Atleta8: TStringField
      FieldName = 'Atleta8'
      Size = 50
    end
    object cdsTabellone16Atleta9: TStringField
      FieldName = 'Atleta9'
      Size = 50
    end
    object cdsTabellone16Atleta10: TStringField
      FieldName = 'Atleta10'
      Size = 50
    end
    object cdsTabellone16Atleta11: TStringField
      FieldName = 'Atleta11'
      Size = 50
    end
    object cdsTabellone16Atleta12: TStringField
      FieldName = 'Atleta12'
      Size = 50
    end
    object cdsTabellone16Atleta13: TStringField
      FieldName = 'Atleta13'
      Size = 50
    end
    object cdsTabellone16Atleta14: TStringField
      FieldName = 'Atleta14'
      Size = 50
    end
    object cdsTabellone16Atleta15: TStringField
      FieldName = 'Atleta15'
      Size = 50
    end
    object cdsTabellone16Atleta16: TStringField
      FieldName = 'Atleta16'
      Size = 50
    end
  end
  object cdsTabellone8: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 72
    object cdsTabellone8Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabellone8Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabellone8Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabellone8Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
    object cdsTabellone8Atleta5: TStringField
      FieldName = 'Atleta5'
      Size = 50
    end
    object cdsTabellone8Atleta6: TStringField
      FieldName = 'Atleta6'
      Size = 50
    end
    object cdsTabellone8Atleta7: TStringField
      FieldName = 'Atleta7'
      Size = 50
    end
    object cdsTabellone8Atleta8: TStringField
      FieldName = 'Atleta8'
      Size = 50
    end
  end
  object cdsTabellone4: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 128
    object cdsTabellone4Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabellone4Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabellone4Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabellone4Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
  end
  object cdsPalestreApp: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 324
    Top = 80
    object cdsPalestreAppCodice: TIntegerField
      FieldName = 'Codice'
    end
    object cdsPalestreAppNome: TStringField
      FieldName = 'Nome'
      Size = 50
    end
  end
  object cdsAtletiApp: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 416
    Top = 80
    object cdsAtletiAppCodice: TIntegerField
      FieldName = 'Codice'
    end
    object cdsAtletiAppNome: TStringField
      FieldName = 'Nome'
      Size = 100
    end
    object cdsAtletiAppPeso: TFloatField
      FieldName = 'Peso'
    end
    object cdsAtletiAppCodicePalestra: TIntegerField
      FieldName = 'CodicePalestra'
    end
    object cdsAtletiAppCategoria: TStringField
      FieldName = 'Categoria'
      Size = 50
    end
    object cdsAtletiAppSesso: TStringField
      FieldName = 'Sesso'
      Size = 1
    end
    object cdsAtletiAppGrado: TStringField
      FieldName = 'Grado'
      Size = 1
    end
  end
  object cdsTabelloneIta4: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 296
    object cdsTabelloneIta4Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabelloneIta4Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabelloneIta4Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabelloneIta4Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
    object cdsTabelloneIta4Palestra1: TStringField
      FieldName = 'Palestra1'
      Size = 50
    end
    object cdsTabelloneIta4Palestra2: TStringField
      FieldName = 'Palestra2'
      Size = 50
    end
    object cdsTabelloneIta4Palestra3: TStringField
      FieldName = 'Palestra3'
      Size = 50
    end
    object cdsTabelloneIta4Palestra4: TStringField
      FieldName = 'Palestra4'
      Size = 50
    end
  end
  object cdsTabelloneIta3: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 240
    object cdsTabelloneIta3Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabelloneIta3Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabelloneIta3Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabelloneIta3Palestra1: TStringField
      FieldName = 'Palestra1'
      Size = 50
    end
    object cdsTabelloneIta3Palestra2: TStringField
      FieldName = 'Palestra2'
      Size = 50
    end
    object cdsTabelloneIta3Palestra3: TStringField
      FieldName = 'Palestra3'
      Size = 50
    end
  end
  object cdsTabelloneIta5: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 56
    Top = 352
    object cdsTabelloneIta5Atleta1: TStringField
      FieldName = 'Atleta1'
      Size = 50
    end
    object cdsTabelloneIta5Atleta2: TStringField
      FieldName = 'Atleta2'
      Size = 50
    end
    object cdsTabelloneIta5Atleta3: TStringField
      FieldName = 'Atleta3'
      Size = 50
    end
    object cdsTabelloneIta5Atleta4: TStringField
      FieldName = 'Atleta4'
      Size = 50
    end
    object cdsTabelloneIta5Atleta5: TStringField
      FieldName = 'Atleta5'
      Size = 50
    end
    object cdsTabelloneIta5Palestra1: TStringField
      FieldName = 'Palestra1'
      Size = 50
    end
    object cdsTabelloneIta5Palestra2: TStringField
      FieldName = 'Palestra2'
      Size = 50
    end
    object cdsTabelloneIta5Palestra3: TStringField
      FieldName = 'Palestra3'
      Size = 50
    end
    object cdsTabelloneIta5Palestra4: TStringField
      FieldName = 'Palestra4'
      Size = 50
    end
    object cdsTabelloneIta5Palestra5: TStringField
      FieldName = 'Palestra5'
      Size = 50
    end
  end
  object cdsAtleti: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    AfterOpen = cdsAtletiAfterOpen
    OnNewRecord = cdsAtletiNewRecord
    Left = 416
    Top = 16
    object cdsAtletiCodice: TIntegerField
      FieldName = 'Codice'
    end
    object cdsAtletiNome: TStringField
      FieldName = 'Nome'
      Size = 100
    end
    object cdsAtletiPeso: TFloatField
      FieldName = 'Peso'
    end
    object cdsAtletiCodicePalestra: TIntegerField
      FieldName = 'CodicePalestra'
    end
    object cdsAtletiCategoria: TStringField
      FieldName = 'Categoria'
      Size = 50
    end
    object cdsAtletiPalestra: TStringField
      FieldKind = fkLookup
      FieldName = 'Palestra'
      LookupDataSet = cdsPalestre
      LookupKeyFields = 'Codice'
      LookupResultField = 'Nome'
      KeyFields = 'CodicePalestra'
      Size = 50
      Lookup = True
    end
    object cdsAtletiSesso: TStringField
      FieldName = 'Sesso'
      Size = 1
    end
    object cdsAtletiGrado: TStringField
      FieldName = 'Grado'
      OnGetText = cdsAtletiGradoGetText
      OnSetText = cdsAtletiGradoSetText
      Size = 1
    end
  end
  object cdsAtletiApp2: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 416
    Top = 192
    object cdsAtletiApp2Nome: TStringField
      FieldName = 'Nome'
      Size = 100
    end
    object cdsAtletiApp2CodicePalestra: TIntegerField
      FieldName = 'CodicePalestra'
    end
    object cdsAtletiApp2Peso: TFloatField
      FieldName = 'Peso'
    end
    object cdsAtletiApp2Categoria: TStringField
      FieldName = 'Categoria'
      Size = 50
    end
    object cdsAtletiApp2Sesso: TStringField
      FieldName = 'Sesso'
      Size = 1
    end
    object cdsAtletiApp2Grado: TStringField
      FieldName = 'Grado'
      Size = 1
    end
  end
  object cdsAtletiApp1: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 416
    Top = 134
    object cdsAtletiApp1Nome: TStringField
      FieldName = 'Nome'
      Size = 100
    end
    object cdsAtletiApp1CodicePalestra: TIntegerField
      FieldName = 'CodicePalestra'
    end
    object cdsAtletiApp1Categoria: TStringField
      FieldName = 'Categoria'
      Size = 50
    end
    object cdsAtletiApp1Peso: TFloatField
      FieldName = 'Peso'
    end
    object cdsAtletiApp1Sesso: TStringField
      FieldName = 'Sesso'
      Size = 1
    end
    object cdsAtletiApp1Grado: TStringField
      FieldName = 'Grado'
      Size = 1
    end
  end
  object cdsPalestre: TClientDataSet
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Codice'
        Attributes = [faUnNamed]
        DataType = ftInteger
      end
      item
        Name = 'Nome'
        Attributes = [faUnNamed]
        DataType = ftString
        Size = 50
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    AfterOpen = cdsPalestreAfterOpen
    OnNewRecord = cdsPalestreNewRecord
    Left = 324
    Top = 16
    object cdsPalestreCodice: TIntegerField
      FieldName = 'Codice'
    end
    object cdsPalestreNome: TStringField
      FieldName = 'Nome'
      Size = 50
    end
  end
  object srcAtleti: TDataSource
    DataSet = cdsAtleti
    Left = 184
    Top = 88
  end
  object srcPalestre: TDataSource
    DataSet = cdsPalestre
    Left = 188
    Top = 160
  end
end
